100 REM *** SNAIL BOOT ***
105 PRINT"":POKE53280,12:POKE53281,12
110 POKE 775,200:POKE808,225:GOSUB500
119 PRINT"[147]                        "CHR$(142)
120 PRINT"             SNAIL C.64 "
122 PRINT"                        "
130 PRINT"   DO YOU WISH TO SEE INSTRUCTIONS"
140 PRINT"            FOR MY WORLD?"
150 GETZ$:IFZ$=""THEN150
160 IFZ$="Y"THEN180
170 GOTO 220
180 PRINT"[144][147]          LOADING INSTRUCTIONS[152]"
190 PRINT"LOAD"CHR$(34)"SNAIL.C64.INST"CHR$(34)",8"
200 PRINT"RUN":PRINT"[145][145][145][145][145][145][145][145][145]"
210 POKE631,13:POKE632,13:POKE198,2:END
220 PRINT"[144][147]             LOADING SNAIL[152]"
230 PRINT"LOAD"CHR$(34)"SNAIL.C64"CHR$(34)",8"
240 PRINT"RUN":PRINT"[145][145][145][145][145][145][145][145][145]"
250 POKE631,13:POKE632,13:POKE198,2:END
500 PRINT"[147]":POKE53281,12:PRINTCHR$(14)
510 PRINTTAB(14)"[164][164][164][164][164][164][164][164][164][164][164]"
520 PRINTTAB(14)" [211]NAIL [195]64 "
530 PRINTTAB(9)"[151][198]REE [198]OR [196]ISTRIBUTION"
540 PRINTTAB(18)"IN"
550 PRINTTAB(9)"[195]ANADIAN [211]CHOOLS [207]NLY"
560 PRINTTAB(15)"[158][195]OURTESY"
570 PRINTTAB(11)"[195][207][205][205][207][196][207][210][197] [195][193][206][193][196][193][155]"
580 FORI=6TO16:POKE53280,I:FORDY=1TO450:NEXTDY:NEXTI:FORDY=1TO1500:NEXTDY
590 RETURN